package com.ckzp.core.util;

import com.alibaba.fastjson.JSONArray;
import com.alibaba.fastjson.JSONObject;
import org.dom4j.*;

import java.io.Serializable;
import java.io.UnsupportedEncodingException;
import java.lang.reflect.Field;
import java.lang.reflect.ParameterizedType;
import java.util.HashMap;
import java.util.List;
import java.util.Map;

/**
 * xml 转换工具类
 * Created by 51594 on 2022/8/16.
 */
public class XmlUtil {


    private static final String XML_ENCODING = "UTF-8";
    //请求一级结点
    private static final String REQUEST_ROOT_NODE = "xml";
    //返回一级结点
    private static final String RESPONSE_ROOT_NODE = "response";


    /**
     * org.dom4j.Document 转  com.alibaba.fastjson.JSONObject
     *
     * @param xml
     * @return
     * @throws org.dom4j.DocumentException
     */
    public static JSONObject toJson(String xml) {
        return toJson(toDocument(xml).getRootElement());
    }

    /**
     * String 转 org.dom4j.Document
     *
     * @param xml
     * @return
     * @throws org.dom4j.DocumentException
     */
    public static Document toDocument(String xml) {
        try {
            //加上xml标签是为了获取最外层的标签，如果不需要可以去掉
            return DocumentHelper.parseText(xml);
        } catch (DocumentException e) {
            return null;
        }
    }

    /**
     * org.dom4j.Element 转  com.alibaba.fastjson.JSONObject
     *
     * @param node
     * @return
     */
    public static JSONObject toJson(Element node) {
        JSONObject result = new JSONObject();
        // 当前节点的名称、文本内容和属性
        List<Attribute> listAttr = node.attributes();// 当前节点的所有属性的list
        for (Attribute attr : listAttr) {// 遍历当前节点的所有属性
            result.put(attr.getName(), attr.getValue());
        }
        // 递归遍历当前节点所有的子节点
        List<Element> listElement = node.elements();// 所有一级子节点的list
        if (!listElement.isEmpty()) {
            for (Element e : listElement) {// 遍历所有一级子节点
                if (e.attributes().isEmpty() && e.elements().isEmpty()) // 判断一级节点是否有属性和子节点
                    result.put(e.getName(), e.getTextTrim());// 沒有则将当前节点作为上级节点的属性对待
                else {
                    if (!result.containsKey(e.getName())) // 判断父节点是否存在该一级节点名称的属性
                        result.put(e.getName(), new JSONArray());// 没有则创建
                    ((JSONArray) result.get(e.getName())).add(toJson(e));// 将该一级节点放入该节点名称的属性对应的值中
                }
            }
        }
        return result;
    }


    /**
     * 构造xml格式
     *
     * @param o
     * @return
     */
    public static String toXml(Object o) {
        return toXml(o, REQUEST_ROOT_NODE);
    }

    /**
     * 构造xml格式
     *
     * @param o
     * @return
     */
    public static String toXml(Object o, String root_node) {
        //生成头部信息
        Document document = generateRootNode();
        //添加根节点
        Element element = document.addElement(root_node);
        //构造子结点
        buildXml(o, element);
        //返回
        try {
            return new String(document.asXML().getBytes(), "UTF-8");
        } catch (UnsupportedEncodingException e) {
            e.printStackTrace();
            // System.out.println("不支持的编码格式");
            return null;
        }
    }

    /**
     * @param o
     * @param root
     */
    private static void buildXml(Object o, Element root) {
        //生成子结点
        try {
            transXmlFromDTO(o, root, null);
        } catch (IllegalAccessException e) {
            e.printStackTrace();
        }
    }

    /**
     * @return
     */
    private static Document generateRootNode() {
        //生成头部
        Document xml = DocumentHelper.createDocument();
        //设置解码格式
        xml.setXMLEncoding(XML_ENCODING);
        //添加一级结点--request
        return xml;
    }


    /**
     * 请求对象转XML
     *
     * @param obj
     * @param rootElement
     * @param childName
     * @throws IllegalAccessException
     */
    private static <T> void transXmlFromDTO(Object obj, Element rootElement, String childName) throws IllegalAccessException {
        Class clazz = obj.getClass();
        //获取属性的数组
        Field[] declaredFields = clazz.getDeclaredFields();
        //添加子节点,如果childName为空的话，子节点默认等于根节点
        Element childElement = rootElement;
        if (null != childName) {
            childElement = rootElement.addElement(childName);
        }
        //遍历带转换的dto
        for (Field field : declaredFields) {

            //设置可到达
            field.setAccessible(true);
            //获取属性的值
            Object fieldValue = field.get(obj);
            //获取属性的类信息
            Class fieldType = field.getType();
            //为空直接返回
            if (null == fieldValue || field.getName().equals("this$0")) {
                continue;
            }
            //String
            if (fieldType.equals(String.class)) {
                String name = field.getName();
                //特殊字符package处理
                if ("package002".equals(name)) {
                    name = "package";
                }
                //添加子节点
                Element element = childElement.addElement(name);
                //添加值
                element.addText((String) fieldValue );
               // element.addText("![CDATA[" + (String) fieldValue + "]]");
                //继续
                continue;
            }
            //如果有属性类型为List
            if (fieldType.equals(List.class) && field.getGenericType() instanceof ParameterizedType) {
                //获取列表数据
                List<Object> list = (List<Object>) fieldValue;
                //遍历
                for (Object childObj : list) {
                    transXmlFromDTO(childObj, childElement, field.getName());
                }
                continue;
            }
            //如果是Integer类型
            if (fieldValue instanceof Integer) {
                //添加子节点
                Element element = childElement.addElement(field.getName());
                //添加值
                element.addText(((Integer) field.get(obj)).toString());
                continue;
            }
            //如果为Double
            if (fieldValue instanceof Double) {
                //添加子节点
                Element element = childElement.addElement(field.getName());
                //添加值
                element.addText(field.get(obj).toString());
                continue;
            }

            //如果为Long
            if (fieldValue instanceof Long) {
                //添加子节点
                Element element = childElement.addElement(field.getName());
                //添加值
                element.addText(field.get(obj).toString());
                continue;
            }
            //对象
            if (fieldValue instanceof Serializable) {
                //添加子节点
                transXmlFromDTO(fieldValue, childElement, field.getName());
                continue;
            }
        }
    }

    /**
     * @param xmlStr
     * @param clazz
     * @return
     */
    public static Object toBean(String xmlStr, Class clazz) {
        Object obj = null;
        try {
            // 将xml格式的数据转换成Map对象
            Map<String, Object> map = xmlStrToMap(xmlStr);
            //将map对象的数据转换成Bean对象
            obj = mapToBean(map, clazz);
        } catch (Exception e) {
            e.printStackTrace();
        }
        return obj;
    }

    /**
     * 将Map对象通过反射机制转换成Bean对象
     *
     * @param map   存放数据的map对象
     * @param clazz 待转换的class
     * @return 转换后的Bean对象
     * @throws Exception 异常
     */
    public static Object mapToBean(Map<String, Object> map, Class clazz) throws Exception {
        Object obj = clazz.newInstance();
        if (map != null && map.size() > 0) {
            for (Map.Entry<String, Object> entry : map.entrySet()) {
                try {
                    String propertyName = entry.getKey();
                    Object value = entry.getValue();
                    String setMethodName = "set"
                            + propertyName.substring(0, 1).toUpperCase()
                            + propertyName.substring(1);
                    Field field = getClassField(clazz, propertyName);
                    if (field != null) {
                        Class fieldTypeClass = field.getType();
                        value = convertValType(value, fieldTypeClass);
                        clazz.getMethod(setMethodName, field.getType()).invoke(obj, value);
                    }
                } catch (Exception e) {
                    e.printStackTrace();
                }
            }
        }
        return obj;
    }


    /**
     * 获取指定字段名称查找在class中的对应的Field对象(包括查找父类)
     *
     * @param clazz     指定的class
     * @param fieldName 字段名称
     * @return Field对象
     */
    private static Field getClassField(Class clazz, String fieldName) {
        if (Object.class.getName().equals(clazz.getName())) {
            return null;
        }
        Field[] declaredFields = clazz.getDeclaredFields();
        for (Field field : declaredFields) {
            if (field.getName().equals(fieldName)) {
                return field;
            }
        }

        Class superClass = clazz.getSuperclass();
        if (superClass != null) {// 简单的递归一下
            return getClassField(superClass, fieldName);
        }
        return null;
    }


    /**
     * 将Object类型的值，转换成bean对象属性里对应的类型值
     *
     * @param value          Object对象值
     * @param fieldTypeClass 属性的类型
     * @return 转换后的值
     */
    private static Object convertValType(Object value, Class fieldTypeClass) {
        Object retVal = null;
        if (Long.class.getName().equals(fieldTypeClass.getName())
                || long.class.getName().equals(fieldTypeClass.getName())) {
            retVal = Long.parseLong(value.toString());
        } else if (Integer.class.getName().equals(fieldTypeClass.getName())
                || int.class.getName().equals(fieldTypeClass.getName())) {
            retVal = Integer.parseInt(value.toString());
        } else if (Float.class.getName().equals(fieldTypeClass.getName())
                || float.class.getName().equals(fieldTypeClass.getName())) {
            retVal = Float.parseFloat(value.toString());
        } else if (Double.class.getName().equals(fieldTypeClass.getName())
                || double.class.getName().equals(fieldTypeClass.getName())) {
            retVal = Double.parseDouble(value.toString());
        } else {
            retVal = value;
        }
        return retVal;
    }

    /**
     * 将xml格式的字符串转换成Map对象
     *
     * @param xmlStr xml格式的字符串
     * @return Map对象
     * @throws Exception 异常
     */
    public static Map<String, Object> xmlStrToMap(String xmlStr) throws Exception {
        if (StringUtil.isEmpty(xmlStr)) {
            return null;
        }
        Map<String, Object> map = new HashMap<String, Object>();
        //将xml格式的字符串转换成Document对象
        Document doc = DocumentHelper.parseText(xmlStr);
        //获取根节点
        Element root = doc.getRootElement();
        //获取根节点下的所有元素
        List children = root.elements();
        //循环所有子元素
        if (children != null && children.size() > 0) {
            for (int i = 0; i < children.size(); i++) {
                Element child = (Element) children.get(i);
                map.put(child.getName(), child.getTextTrim());
            }
        }
        return map;
    }


    /**
     * @param arg
     */
    public static void main(String[] arg) {
//        InterfaceObject m = new InterfaceObject();
//        m.setFromUserName("aaa");
//        m.setToUserName("bbb");
//        System.out.println(toXml(m));
    }
}
